home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1988-03-25 | 11.2 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| WANG Integrated Word Processor (document/wangIWP)
| ext
| Unsupported |
| 1%
| dexvert
| Dynamic Publisher Document (document/dynamicPublisherDocument)
| ext
| Unsupported |
| 1%
| dexvert
| Excellence! Document (document/excellenceDocument)
| ext
| Unsupported |
| 1%
| dexvert
| Norton Textra Writer (document/textraWriter)
| ext
| Unsupported |
| 1%
| dexvert
| IBM DisplayWrite Document (document/ibmDisplayWriteDocument)
| ext
| Unsupported |
| 1%
| dexvert
| Open Access Document (document/openAccessDocument)
| ext
| Unsupported |
| 100%
| file
| Generic INItialization configuration [options]
| default (weak)
| |
| 99%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 0a 0d 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|00000010| 20 20 20 20 20 20 20 20 | 20 20 20 54 50 54 43 31 | | TPTC1|
|00000020| 36 20 2d 20 54 72 61 6e | 73 6c 61 74 65 20 50 61 |6 - Tran|slate Pa|
|00000030| 73 63 61 6c 20 74 6f 20 | 43 0d 0a 20 20 20 20 20 |scal to |C.. |
|00000040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000050| 20 20 20 20 20 20 56 65 | 72 73 69 6f 6e 20 31 2e | Ve|rsion 1.|
|00000060| 36 2c 20 31 33 2d 46 65 | 62 2d 38 38 0d 0a 0d 0a |6, 13-Fe|b-88....|
|00000070| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000080| 20 28 43 29 20 43 6f 70 | 79 72 69 67 68 74 20 31 | (C) Cop|yright 1|
|00000090| 39 38 36 2c 20 31 39 38 | 38 20 62 79 20 53 61 6d |986, 198|8 by Sam|
|000000a0| 75 65 6c 20 48 2e 20 53 | 6d 69 74 68 0d 0a 20 20 |uel H. S|mith.. |
|000000b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000c0| 20 20 20 20 20 20 20 20 | 20 20 41 6c 6c 20 72 69 | | All ri|
|000000d0| 67 68 74 73 20 72 65 73 | 65 72 76 65 64 2e 0d 0a |ghts res|erved...|
|000000e0| 0d 0a 0d 0a 54 68 69 73 | 20 70 72 6f 67 72 61 6d |....This| program|
|000000f0| 20 77 69 6c 6c 20 72 65 | 61 64 20 61 20 74 75 72 | will re|ad a tur|
|00000100| 62 6f 20 70 61 73 63 61 | 6c 20 73 6f 75 72 63 65 |bo pasca|l source|
|00000110| 20 66 69 6c 65 20 61 6e | 64 20 63 6f 6e 76 65 72 | file an|d conver|
|00000120| 74 20 69 74 20 69 6e 74 | 6f 0d 0a 74 68 65 20 20 |t it int|o..the |
|00000130| 63 6f 72 72 65 73 70 6f | 6e 64 69 6e 67 20 43 20 |correspo|nding C |
|00000140| 73 6f 75 72 63 65 20 63 | 6f 64 65 2e 20 20 20 49 |source c|ode. I|
|00000150| 74 20 64 6f 65 73 20 6d | 75 63 68 20 6f 66 20 74 |t does m|uch of t|
|00000160| 68 65 20 77 6f 72 6b 20 | 72 65 71 75 69 72 65 64 |he work |required|
|00000170| 20 69 6e 0d 0a 61 20 66 | 75 6c 6c 20 74 72 61 6e | in..a f|ull tran|
|00000180| 73 6c 61 74 69 6f 6e 2e | 0d 0a 0d 0a 55 73 61 67 |slation.|....Usag|
|00000190| 65 3a 20 20 20 54 50 54 | 43 20 69 6e 70 75 74 5f |e: TPT|C input_|
|000001a0| 66 69 6c 65 20 5b 6f 75 | 74 70 75 74 5f 66 69 6c |file [ou|tput_fil|
|000001b0| 65 5d 20 5b 6f 70 74 69 | 6f 6e 73 5d 0d 0a 0d 0a |e] [opti|ons]....|
|000001c0| 57 68 65 72 65 3a 20 20 | 20 69 6e 70 75 74 5f 66 |Where: | input_f|
|000001d0| 69 6c 65 20 20 20 20 20 | 20 73 70 65 63 69 66 69 |ile | specifi|
|000001e0| 65 73 20 74 68 65 20 6d | 61 69 6e 20 73 6f 75 72 |es the m|ain sour|
|000001f0| 63 65 20 66 69 6c 65 2c | 20 2e 50 41 53 20 64 65 |ce file,| .PAS de|
|00000200| 66 61 75 6c 74 0d 0a 20 | 20 20 20 20 20 20 20 20 |fault.. | |
|00000210| 6f 75 74 70 75 74 5f 66 | 69 6c 65 20 20 20 20 20 |output_f|ile |
|00000220| 73 70 65 63 69 66 69 65 | 73 20 74 68 65 20 6f 75 |specifie|s the ou|
|00000230| 74 70 75 74 20 66 69 6c | 65 2c 20 2e 43 20 64 65 |tput fil|e, .C de|
|00000240| 66 61 75 6c 74 0d 0a 20 | 20 20 20 20 20 20 20 20 |fault.. | |
|00000250| 2d 42 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |-B | |
|00000260| 64 65 42 75 67 20 74 72 | 61 63 65 20 64 75 72 69 |deBug tr|ace duri|
|00000270| 6e 67 20 73 63 61 6e 0d | 0a 20 20 20 20 20 20 20 |ng scan.|. |
|00000280| 20 20 2d 42 50 20 20 20 | 20 20 20 20 20 20 20 20 | -BP | |
|00000290| 20 20 64 65 42 75 67 20 | 74 72 61 63 65 20 64 75 | deBug |trace du|
|000002a0| 72 69 6e 67 20 50 61 72 | 73 65 0d 0a 20 20 20 20 |ring Par|se.. |
|000002b0| 20 20 20 20 20 2d 44 20 | 20 20 20 20 20 20 20 20 | -D | |
|000002c0| 20 20 20 20 20 44 75 6d | 70 20 75 73 65 72 20 73 | Dum|p user s|
|000002d0| 79 6d 62 6f 6c 73 0d 0a | 20 20 20 20 20 20 20 20 |ymbols..| |
|000002e0| 20 2d 44 50 20 20 20 20 | 20 20 20 20 20 20 20 20 | -DP | |
|000002f0| 20 44 75 6d 70 20 50 72 | 65 64 65 66 69 6e 65 64 | Dump Pr|edefined|
|00000300| 20 73 79 73 74 65 6d 20 | 73 79 6d 62 6f 6c 73 0d | system |symbols.|
|00000310| 0a 20 20 20 20 20 20 20 | 20 20 2d 49 20 20 20 20 |. | -I |
|00000320| 20 20 20 20 20 20 20 20 | 20 20 6f 75 74 70 75 74 | | output|
|00000330| 20 49 6e 63 6c 75 64 65 | 20 66 69 6c 65 73 27 20 | Include| files' |
|00000340| 63 6f 6e 74 65 6e 74 73 | 0d 0a 20 20 20 20 20 20 |contents|.. |
|00000350| 20 20 20 2d 4c 20 20 20 | 20 20 20 20 20 20 20 20 | -L | |
|00000360| 20 20 20 6d 61 70 20 61 | 6c 6c 20 69 64 65 6e 74 | map a|ll ident|
|00000370| 69 66 69 65 72 73 20 74 | 6f 20 4c 6f 77 65 72 20 |ifiers t|o Lower |
|00000380| 63 61 73 65 0d 0a 20 20 | 20 20 20 20 20 20 20 2d |case.. | -|
|00000390| 4d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 75 |M | u|
|000003a0| 73 65 20 50 61 73 63 61 | 6c 2f 4d 54 2b 20 73 70 |se Pasca|l/MT+ sp|
|000003b0| 65 63 69 66 69 63 20 74 | 72 61 6e 73 6c 61 74 69 |ecific t|ranslati|
|000003c0| 6f 6e 73 0d 0a 20 20 20 | 20 20 20 20 20 20 2d 4e |ons.. | -N|
|000003d0| 43 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4e 6f |C | No|
|000003e0| 20 43 6f 6d 6d 65 6e 74 | 73 20 70 61 73 73 65 64 | Comment|s passed|
|000003f0| 20 74 6f 20 6f 75 74 70 | 75 74 20 66 69 6c 65 0d | to outp|ut file.|
|00000400| 0a 20 20 20 20 20 20 20 | 20 20 2d 51 20 20 20 20 |. | -Q |
|00000410| 20 20 20 20 20 20 20 20 | 20 20 51 75 69 65 74 20 | | Quiet |
|00000420| 6d 6f 64 65 3b 20 73 75 | 70 70 72 65 73 73 20 77 |mode; su|ppress w|
|00000430| 61 72 6e 69 6e 67 73 0d | 0a 20 20 20 20 20 20 20 |arnings.|. |
|00000440| 20 20 2d 53 64 69 72 5c | 20 20 20 20 20 20 20 20 | -Sdir\| |
|00000450| 20 20 73 65 61 72 63 68 | 20 64 69 72 5c 20 66 6f | search| dir\ fo|
|00000460| 72 20 2e 55 4e 53 20 73 | 79 6d 62 6f 6c 20 66 69 |r .UNS s|ymbol fi|
|00000470| 6c 65 73 0d 0a 20 20 20 | 20 20 20 20 20 20 2d 54 |les.. | -T|
|00000480| 6e 6e 20 20 20 20 20 20 | 20 20 20 20 20 20 54 61 |nn | Ta|
|00000490| 62 20 6e 6e 20 63 6f 6c | 75 6d 6e 73 20 69 6e 20 |b nn col|umns in |
|000004a0| 64 65 63 6c 61 72 61 74 | 69 6f 6e 73 0d 0a 20 20 |declarat|ions.. |
|000004b0| 20 20 20 20 20 20 20 2d | 57 64 72 69 76 65 3a 20 | -|Wdrive: |
|000004c0| 20 20 20 20 20 20 20 75 | 73 65 20 64 72 69 76 65 | u|se drive|
|000004d0| 3a 20 66 6f 72 20 57 6f | 72 6b 2f 73 63 72 61 74 |: for Wo|rk/scrat|
|000004e0| 63 68 20 66 69 6c 65 73 | 20 28 72 61 6d 64 72 69 |ch files| (ramdri|
|000004f0| 76 65 29 0d 0a 20 20 20 | 20 20 20 20 20 20 2d 23 |ve).. | -#|
|00000500| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 64 6f | | do|
|00000510| 6e 27 74 20 74 72 61 6e | 73 6c 61 74 65 20 6c 69 |n't tran|slate li|
|00000520| 6e 65 73 20 73 74 61 72 | 74 69 6e 67 20 77 69 74 |nes star|ting wit|
|00000530| 68 20 22 23 22 0d 0a 0d | 0a 44 65 66 61 75 6c 74 |h "#"...|.Default|
|00000540| 20 63 6f 6d 6d 61 6e 64 | 20 70 61 72 61 6d 65 74 | command| paramet|
|00000550| 65 72 73 20 61 72 65 20 | 6c 6f 61 64 65 64 20 66 |ers are |loaded f|
|00000560| 72 6f 6d 20 54 50 54 43 | 20 65 6e 76 69 72 6f 6e |rom TPTC| environ|
|00000570| 6d 65 6e 74 20 76 61 72 | 69 61 62 6c 65 2e 0d 0a |ment var|iable...|
|00000580| 0d 0a 45 78 61 6d 70 6c | 65 3a 20 74 70 74 63 20 |..Exampl|e: tptc |
|00000590| 66 6d 61 70 0d 0a 20 20 | 20 20 20 20 20 20 20 74 |fmap.. | t|
|000005a0| 70 74 63 20 66 6d 61 70 | 20 2d 4c 20 2d 64 20 2d |ptc fmap| -L -d -|
|000005b0| 77 6a 3a 5c 74 6d 70 5c | 0d 0a 20 20 20 20 20 20 |wj:\tmp\|.. |
|000005c0| 20 20 20 74 70 74 63 20 | 2d 6c 20 2d 64 20 2d 77 | tptc |-l -d -w|
|000005d0| 6a 3a 20 2d 69 20 2d 71 | 20 2d 74 31 35 20 66 6d |j: -i -q| -t15 fm|
|000005e0| 61 70 2e 70 61 73 20 66 | 6d 61 70 2e 6f 75 74 0d |ap.pas f|map.out.|
|000005f0| 0a 0d 0a 20 20 20 20 20 | 20 20 20 20 73 65 74 20 |... | set |
|00000600| 74 70 74 63 3d 2d 77 6a | 3a 20 2d 69 20 2d 6c 20 |tptc=-wj|: -i -l |
|00000610| 2d 73 63 3a 5c 6c 69 62 | 73 0d 0a 20 20 20 20 20 |-sc:\lib|s.. |
|00000620| 20 20 20 20 74 70 74 63 | 20 74 65 73 74 20 20 20 | tptc| test |
|00000630| 20 20 20 20 3b 75 73 65 | 73 20 6f 70 74 69 6f 6e | ;use|s option|
|00000640| 73 20 73 70 65 63 69 66 | 69 65 64 20 65 61 72 6c |s specif|ied earl|
|00000650| 69 65 72 0d 0a 0d 0a 0d | 0a 4c 49 43 45 4e 53 45 |ier.....|.LICENSE|
|00000660| 00 0d 0a 3d 3d 3d 3d 3d | 3d 3d 0d 0a 0d 0a 20 20 |...=====|==.... |
|00000670| 20 53 6f 75 72 63 65 57 | 61 72 65 3a 20 57 68 61 | SourceW|are: Wha|
|00000680| 74 20 69 73 20 69 74 3f | 00 0d 0a 20 20 20 2d 2d |t is it?|... --|
|00000690| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006a0| 2d 2d 2d 2d 2d 0d 0a 20 | 20 20 53 6f 75 72 63 65 |-----.. | Source|
|000006b0| 57 61 72 65 20 69 73 20 | 6d 79 20 6e 61 6d 65 20 |Ware is |my name |
|000006c0| 66 6f 72 20 61 20 75 6e | 69 71 75 65 20 63 6f 6e |for a un|ique con|
|000006d0| 63 65 70 74 20 69 6e 20 | 75 73 65 72 20 73 75 70 |cept in |user sup|
|000006e0| 70 6f 72 74 65 64 20 73 | 6f 66 74 77 61 72 65 2e |ported s|oftware.|
|000006f0| 20 0d 0a 20 20 20 0d 0a | 20 20 20 50 72 6f 67 72 | .. ..| Progr|
|00000700| 61 6d 73 20 64 69 73 74 | 72 69 62 75 74 65 64 20 |ams dist|ributed |
|00000710| 75 6e 64 65 72 20 74 68 | 65 20 53 6f 75 72 63 65 |under th|e Source|
|00000720| 57 61 72 65 20 63 6f 6e | 63 65 70 74 20 61 6c 77 |Ware con|cept alw|
|00000730| 61 79 73 20 6f 66 66 65 | 72 20 63 6f 6d 70 6c 65 |ays offe|r comple|
|00000740| 74 65 20 0d 0a 20 20 20 | 73 6f 75 72 63 65 20 63 |te .. |source c|
|00000750| 6f 64 65 2e 20 0d 0a 0d | 0a 20 20 20 54 68 69 73 |ode. ...|. This|
|00000760| 20 70 61 63 6b 61 67 65 | 20 63 61 6e 20 62 65 20 | package| can be |
|00000770| 66 72 65 65 6c 79 20 64 | 69 73 74 72 69 62 75 74 |freely d|istribut|
|00000780| 65 64 20 73 6f 20 6c 6f | 6e 67 20 61 73 20 69 74 |ed so lo|ng as it|
|00000790| 20 69 73 20 6e 6f 74 20 | 6d 6f 64 69 66 69 65 64 | is not |modified|
|000007a0| 20 0d 0a 20 20 20 6f 72 | 20 73 6f 6c 64 20 66 6f | .. or| sold fo|
|000007b0| 72 20 70 72 6f 66 69 74 | 2e 20 20 49 66 20 79 6f |r profit|. If yo|
|000007c0| 75 20 66 69 6e 64 20 74 | 68 61 74 20 74 68 69 73 |u find t|hat this|
|000007d0| 20 70 72 6f 67 72 61 6d | 20 69 73 20 76 61 6c 75 | program| is valu|
|000007e0| 61 62 6c 65 2c 20 20 79 | 6f 75 20 0d 0a 20 20 20 |able, y|ou .. |
|000007f0| 63 61 6e 20 73 65 6e 64 | 20 6d 65 20 61 20 64 6f |can send| me a do|
|00000800| 6e 61 74 69 6f 6e 20 66 | 6f 72 20 77 68 61 74 20 |nation f|or what |
|00000810| 79 6f 75 20 74 68 69 6e | 6b 20 69 74 20 69 73 20 |you thin|k it is |
|00000820| 77 6f 72 74 68 2e 20 20 | 49 20 73 75 67 67 65 73 |worth. |I sugges|
|00000830| 74 0d 0a 20 20 20 61 62 | 6f 75 74 20 24 32 30 2e |t.. ab|out $20.|
|00000840| 0d 0a 0d 0a 20 20 20 53 | 65 6e 64 20 79 6f 75 72 |.... S|end your|
|00000850| 20 63 6f 6e 74 72 69 62 | 75 74 69 6f 6e 73 20 74 | contrib|utions t|
|00000860| 6f 3a 0d 0a 20 20 20 20 | 20 20 53 61 6d 75 65 6c |o:.. | Samuel|
|00000870| 2e 20 48 2e 20 53 6d 69 | 74 68 0d 0a 20 20 20 20 |. H. Smi|th.. |
|00000880| 20 20 35 31 31 39 20 4e | 2e 20 31 31 20 61 76 65 | 5119 N|. 11 ave|
|00000890| 20 33 33 32 0d 0a 20 20 | 20 20 20 20 50 68 6f 65 | 332.. | Phoe|
|000008a0| 6e 69 78 2c 20 41 7a 20 | 38 35 30 31 33 0d 0a 0d |nix, Az |85013...|
|000008b0| 0a 0c 0d 0a 20 20 20 57 | 68 79 20 53 6f 75 72 63 |.... W|hy Sourc|
|000008c0| 65 57 61 72 65 3f 00 0d | 0a 20 20 20 2d 2d 2d 2d |eWare?..|. ----|
|000008d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0a 20 20 20 |--------|---.. |
|000008e0| 57 68 79 20 64 6f 20 49 | 20 69 6e 63 6c 75 64 65 |Why do I| include|
|000008f0| 20 73 6f 75 72 63 65 20 | 63 6f 64 65 3f 20 20 57 | source |code? W|
|00000900| 68 79 20 69 73 6e 27 74 | 20 74 68 65 20 64 6f 6e |hy isn't| the don|
|00000910| 61 74 69 6f 6e 20 6d 61 | 6e 64 69 74 6f 72 79 3f |ation ma|nditory?|
|00000920| 20 20 54 68 65 0d 0a 20 | 20 20 76 61 6c 75 65 20 | The.. | value |
|00000930| 6f 66 20 67 6f 6f 64 20 | 73 6f 66 74 77 61 72 65 |of good |software|
|00000940| 20 73 68 6f 75 6c 64 20 | 62 65 20 73 65 6c 66 2d | should |be self-|
|00000950| 65 76 69 64 65 6e 74 2e | 20 20 54 68 65 20 73 6f |evident.| The so|
|00000960| 75 72 63 65 20 63 6f 64 | 65 20 69 73 0d 0a 20 20 |urce cod|e is.. |
|00000970| 20 74 68 65 20 6b 65 79 | 20 74 6f 20 63 6f 6d 70 | the key| to comp|
|00000980| 6c 65 74 65 20 75 6e 64 | 65 72 73 74 61 6e 64 69 |lete und|erstandi|
|00000990| 6e 67 20 6f 66 20 61 20 | 70 72 6f 67 72 61 6d 2e |ng of a |program.|
|000009a0| 20 20 59 6f 75 20 63 61 | 6e 20 72 65 61 64 20 69 | You ca|n read i|
|000009b0| 74 20 74 6f 0d 0a 20 20 | 20 66 69 6e 64 20 6f 75 |t to.. | find ou|
|000009c0| 74 20 68 6f 77 20 74 68 | 69 6e 67 73 20 61 72 65 |t how th|ings are|
|000009d0| 20 64 6f 6e 65 2e 20 20 | 59 6f 75 20 63 61 6e 20 | done. |You can |
|000009e0| 61 6c 73 6f 20 63 68 61 | 6e 67 65 20 69 74 20 74 |also cha|nge it t|
|000009f0| 6f 20 73 75 69 74 20 79 | 6f 75 72 0d 0a 20 20 20 |o suit y|our.. |
|00000a00| 6e 65 65 64 73 2c 20 73 | 6f 20 6c 6f 6e 67 20 61 |needs, s|o long a|
|00000a10| 73 20 79 6f 75 20 64 6f | 20 6e 6f 74 20 64 69 73 |s you do| not dis|
|00000a20| 74 72 69 62 75 74 65 20 | 74 68 65 20 6d 6f 64 69 |tribute |the modi|
|00000a30| 66 69 65 64 20 76 65 72 | 73 69 6f 6e 20 77 69 74 |fied ver|sion wit|
|00000a40| 68 6f 75 74 0d 0a 20 20 | 20 6d 79 20 63 6f 6e 73 |hout.. | my cons|
|00000a50| 65 6e 74 2e 0d 0a 0d 0a | 0d 0a 20 20 20 43 6f 70 |ent.....|.. Cop|
|00000a60| 79 72 69 67 68 74 0d 0a | 20 20 20 2d 2d 2d 2d 2d |yright..| -----|
|00000a70| 2d 2d 2d 2d 0d 0a 20 20 | 20 49 66 20 79 6f 75 20 |----.. | If you |
|00000a80| 6d 6f 64 69 66 79 20 74 | 68 69 73 20 70 72 6f 67 |modify t|his prog|
|00000a90| 72 61 6d 2c 20 49 20 77 | 6f 75 6c 64 20 61 70 70 |ram, I w|ould app|
|00000aa0| 72 65 63 69 61 74 65 20 | 61 20 63 6f 70 79 20 6f |reciate |a copy o|
|00000ab0| 66 20 74 68 65 20 6e 65 | 77 0d 0a 20 20 20 73 6f |f the ne|w.. so|
|00000ac0| 75 72 63 65 20 63 6f 64 | 65 2e 20 20 20 49 20 61 |urce cod|e. I a|
|00000ad0| 6d 20 68 6f 6c 64 69 6e | 67 20 74 68 65 20 63 6f |m holdin|g the co|
|00000ae0| 70 79 72 69 67 68 74 20 | 6f 6e 20 74 68 65 20 73 |pyright |on the s|
|00000af0| 6f 75 72 63 65 20 63 6f | 64 65 2c 20 73 6f 0d 0a |ource co|de, so..|
|00000b00| 20 20 20 70 6c 65 61 73 | 65 20 64 6f 6e 27 74 20 | pleas|e don't |
|00000b10| 64 65 6c 65 74 65 20 6d | 79 20 6e 61 6d 65 20 66 |delete m|y name f|
|00000b20| 72 6f 6d 20 74 68 65 20 | 70 72 6f 67 72 61 6d 20 |rom the |program |
|00000b30| 66 69 6c 65 73 20 6f 72 | 20 66 72 6f 6d 20 74 68 |files or| from th|
|00000b40| 65 0d 0a 20 20 20 64 6f | 63 75 6d 65 6e 74 61 74 |e.. do|cumentat|
|00000b50| 69 6f 6e 2e 0d 0a 0d 0a | 0d 0a 53 55 50 50 4f 52 |ion.....|..SUPPOR|
|00000b60| 54 0d 0a 3d 3d 3d 3d 3d | 3d 3d 0d 0a 0d 0a 20 20 |T..=====|==.... |
|00000b70| 20 49 20 77 6f 72 6b 20 | 76 65 72 79 20 68 61 72 | I work |very har|
|00000b80| 64 20 74 6f 20 70 72 6f | 64 75 63 65 20 61 20 73 |d to pro|duce a s|
|00000b90| 6f 66 74 77 61 72 65 20 | 70 61 63 6b 61 67 65 20 |oftware |package |
|00000ba0| 6f 66 20 74 68 65 20 68 | 69 67 68 65 73 74 0d 0a |of the h|ighest..|
|00000bb0| 20 20 20 71 75 61 6c 69 | 74 79 20 61 6e 64 20 66 | quali|ty and f|
|00000bc0| 75 6e 63 74 69 6f 6e 61 | 6c 69 74 79 2e 20 20 49 |unctiona|lity. I|
|00000bd0| 20 74 72 79 20 74 6f 20 | 6c 6f 6f 6b 20 69 6e 74 | try to |look int|
|00000be0| 6f 20 61 6c 6c 20 72 65 | 70 6f 72 74 65 64 20 62 |o all re|ported b|
|00000bf0| 75 67 73 2c 20 61 6e 64 | 0d 0a 20 20 20 77 69 6c |ugs, and|.. wil|
|00000c00| 6c 20 67 65 6e 65 72 61 | 6c 6c 79 20 66 69 78 20 |l genera|lly fix |
|00000c10| 72 65 70 6f 72 74 65 64 | 20 70 72 6f 62 6c 65 6d |reported| problem|
|00000c20| 73 20 77 69 74 68 69 6e | 20 61 20 66 65 77 20 64 |s within| a few d|
|00000c30| 61 79 73 2e 0d 0a 0d 0a | 20 20 20 53 69 6e 63 65 |ays.....| Since|
|00000c40| 20 74 68 69 73 20 69 73 | 20 75 73 65 72 20 73 75 | this is| user su|
|00000c50| 70 70 6f 72 74 65 64 20 | 73 6f 66 74 77 61 72 65 |pported |software|
|00000c60| 20 75 6e 64 65 72 20 74 | 68 65 20 53 6f 75 72 63 | under t|he Sourc|
|00000c70| 65 57 61 72 65 20 20 63 | 6f 6e 63 65 70 74 2c 0d |eWare c|oncept,.|
|00000c80| 0a 20 20 20 49 20 64 6f | 6e 27 74 20 65 78 70 65 |. I do|n't expe|
|00000c90| 63 74 20 79 6f 75 20 74 | 6f 20 63 6f 6e 74 72 69 |ct you t|o contri|
|00000ca0| 62 75 74 65 20 69 66 20 | 79 6f 75 20 64 6f 6e 27 |bute if |you don'|
|00000cb0| 74 20 6c 69 6b 65 20 69 | 74 20 6f 72 20 69 66 20 |t like i|t or if |
|00000cc0| 69 74 0d 0a 20 20 20 64 | 6f 65 73 6e 27 74 20 6d |it.. d|oesn't m|
|00000cd0| 65 65 74 20 79 6f 75 72 | 20 6e 65 65 64 73 2e 0d |eet your| needs..|
|00000ce0| 0a 0d 0a 20 20 20 49 66 | 20 79 6f 75 20 68 61 76 |... If| you hav|
|00000cf0| 65 20 61 6e 79 20 71 75 | 65 73 74 69 6f 6e 73 2c |e any qu|estions,|
|00000d00| 20 62 75 67 73 2c 20 6f | 72 20 73 75 67 67 65 73 | bugs, o|r sugges|
|00000d10| 74 69 6f 6e 73 2c 20 70 | 6c 65 61 73 65 20 63 6f |tions, p|lease co|
|00000d20| 6e 74 61 63 74 20 20 6d | 65 0d 0a 20 20 20 61 74 |ntact m|e.. at|
|00000d30| 3a 20 20 54 68 65 20 54 | 6f 6f 6c 20 53 68 6f 70 |: The T|ool Shop|
|00000d40| 20 42 42 53 20 28 36 30 | 32 29 20 32 37 39 2d 32 | BBS (60|2) 279-2|
|00000d50| 36 37 33 0d 0a 0d 0a 20 | 20 20 54 68 65 20 6c 61 |673.... | The la|
|00000d60| 74 65 73 74 20 76 65 72 | 73 69 6f 6e 20 69 73 20 |test ver|sion is |
|00000d70| 61 6c 77 61 79 73 20 61 | 76 61 69 6c 61 62 6c 65 |always a|vailable|
|00000d80| 20 66 6f 72 20 64 6f 77 | 6e 6c 6f 61 64 69 6e 67 | for dow|nloading|
|00000d90| 2e 20 0d 0a 0d 0a 20 20 | 20 45 6e 6a 6f 79 21 20 |. .... | Enjoy! |
|00000da0| 20 20 20 20 53 61 6d 75 | 65 6c 20 48 2e 20 53 6d | Samu|el H. Sm|
|00000db0| 69 74 68 0d 0a 20 20 20 | 20 20 20 20 20 20 20 20 |ith.. | |
|00000dc0| 20 20 20 41 75 74 68 6f | 72 20 61 6e 64 20 53 79 | Autho|r and Sy|
|00000dd0| 73 6f 70 20 6f 66 20 54 | 68 65 20 54 6f 6f 6c 20 |sop of T|he Tool |
|00000de0| 53 68 6f 70 2e 0d 0a 0d | 0a 0d 0a 0d 0a 0d 0a 54 |Shop....|.......T|
|00000df0| 68 65 20 66 6f 6c 6c 6f | 77 69 6e 67 20 6c 61 6e |he follo|wing lan|
|00000e00| 67 75 61 67 65 20 63 6f | 6e 73 74 72 75 63 74 73 |guage co|nstructs|
|00000e10| 20 61 72 65 20 74 72 61 | 6e 73 6c 61 74 65 64 3a | are tra|nslated:|
|00000e20| 0d 0a 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..------|--------|
|00000e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e50| 2d 2d 0d 0a 0d 0a 20 20 | 20 43 6f 6d 6d 65 6e 74 |--.... | Comment|
|00000e60| 73 20 61 72 65 20 74 72 | 61 6e 73 6c 61 74 65 64 |s are tr|anslated|
|00000e70| 20 66 72 6f 6d 20 65 69 | 74 68 65 72 20 7b 2e 2e | from ei|ther {..|
|00000e80| 2e 7d 20 6f 72 20 28 2a | 2e 2e 2e 2a 29 20 69 6e |.} or (*|...*) in|
|00000e90| 74 6f 20 2f 2a 2e 2e 2e | 2a 2f 2e 0d 0a 0d 0a 20 |to /*...|*/..... |
|00000ea0| 20 20 42 65 67 69 6e 20 | 61 6e 64 20 45 6e 64 20 | Begin |and End |
|00000eb0| 61 72 65 20 74 72 61 6e | 73 6c 61 74 65 64 20 69 |are tran|slated i|
|00000ec0| 6e 74 6f 20 7b 20 61 6e | 64 20 7d 2e 0d 0a 0d 0a |nto { an|d }.....|
|00000ed0| 20 20 20 43 6f 6e 73 74 | 20 64 65 63 6c 61 72 61 | Const| declara|
|00000ee0| 74 69 6f 6e 73 20 61 72 | 65 20 74 72 61 6e 73 6c |tions ar|e transl|
|00000ef0| 61 74 65 64 20 66 72 6f | 6d 0d 0a 20 20 20 20 20 |ated fro|m.. |
|00000f00| 20 49 44 20 3d 20 56 41 | 4c 55 45 0d 0a 20 20 20 | ID = VA|LUE.. |
|00000f10| 69 6e 74 6f 0d 0a 20 20 | 20 20 20 20 73 74 61 74 |into.. | stat|
|00000f20| 69 63 20 49 44 20 3d 20 | 56 41 4c 55 45 2e 0d 0a |ic ID = |VALUE...|
|00000f30| 0d 0a 20 20 20 53 69 6d | 70 6c 65 20 56 61 72 20 |.. Sim|ple Var |
|00000f40| 64 65 63 6c 61 72 61 74 | 69 6f 6e 73 20 61 72 65 |declarat|ions are|
|00000f50| 20 74 72 61 6e 73 6c 61 | 74 65 64 20 66 72 6f 6d | transla|ted from|
|00000f60| 0d 0a 20 20 20 20 20 20 | 49 44 20 54 59 50 45 0d |.. |ID TYPE.|
|00000f70| 0a 20 20 20 69 6e 74 6f | 0d 0a 20 20 20 20 20 20 |. into|.. |
|00000f80| 54 59 50 45 20 49 44 2e | 0d 0a 0c 0d 0a 20 20 20 |TYPE ID.|..... |
|00000f90| 49 6e 74 65 67 65 72 20 | 73 75 62 72 61 6e 67 65 |Integer |subrange|
|00000fa0| 20 74 79 70 65 73 20 61 | 72 65 20 74 72 61 6e 73 | types a|re trans|
|00000fb0| 6c 61 74 65 64 20 69 6e | 74 6f 20 69 6e 74 65 67 |lated in|to integ|
|00000fc0| 65 72 73 2e 0d 0a 0d 0a | 20 20 20 52 65 63 6f 72 |ers.....| Recor|
|00000fd0| 64 20 74 79 70 65 73 20 | 61 72 65 20 74 72 61 6e |d types |are tran|
|00000fe0| 73 6c 61 74 65 64 20 66 | 72 6f 6d 0d 0a 20 20 20 |slated f|rom.. |
|00000ff0| 20 20 20 49 44 20 3d 20 | 72 65 63 6f 72 64 20 4d | ID = |record M|
|00001000| 45 4d 42 45 52 2d 4c 49 | 53 54 20 65 6e 64 0d 0a |EMBER-LI|ST end..|
|00001010| 20 20 20 69 6e 74 6f 0d | 0a 20 20 20 20 20 20 74 | into.|. t|
|00001020| 79 70 65 64 65 66 20 73 | 74 72 75 63 74 20 7b 20 |ypedef s|truct { |
|00001030| 4d 45 4d 42 45 52 2d 4c | 49 53 54 20 7d 20 49 44 |MEMBER-L|IST } ID|
|00001040| 2e 0d 0a 0d 0a 20 20 20 | 45 6e 75 6d 65 72 61 74 |..... |Enumerat|
|00001050| 69 6f 6e 20 74 79 70 65 | 73 20 61 72 65 20 74 72 |ion type|s are tr|
|00001060| 61 6e 73 6c 61 74 65 64 | 20 66 72 6f 6d 0d 0a 20 |anslated| from.. |
|00001070| 20 20 20 20 20 49 44 20 | 3d 20 28 2e 2e 2e 29 0d | ID |= (...).|
|00001080| 0a 20 20 20 69 6e 74 6f | 0d 0a 20 20 20 20 20 20 |. into|.. |
|00001090| 74 79 70 65 64 65 66 20 | 65 6e 75 6d 20 7b 2e 2e |typedef |enum {..|
|000010a0| 2e 7d 20 49 44 2e 0d 0a | 0d 0a 20 20 20 41 72 72 |.} ID...|.. Arr|
|000010b0| 61 79 20 74 79 70 65 73 | 20 61 72 65 20 74 72 61 |ay types| are tra|
|000010c0| 6e 73 6c 61 74 65 64 20 | 66 72 6f 6d 0d 0a 20 20 |nslated |from.. |
|000010d0| 20 20 20 20 49 44 20 3d | 20 61 72 72 61 79 20 5b | ID =| array [|
|000010e0| 52 41 4e 47 45 5d 20 6f | 66 20 54 59 50 45 0d 0a |RANGE] o|f TYPE..|
|000010f0| 20 20 20 69 6e 74 6f 0d | 0a 20 20 20 20 20 20 74 | into.|. t|
|00001100| 79 70 65 64 65 66 20 54 | 59 50 45 20 49 44 5b 52 |ypedef T|YPE ID[R|
|00001110| 41 4e 47 45 5d 2e 0d 0a | 0d 0a 20 20 20 50 6f 69 |ANGE]...|.. Poi|
|00001120| 6e 74 65 72 20 74 79 70 | 65 73 20 61 72 65 20 74 |nter typ|es are t|
|00001130| 72 61 6e 73 6c 61 74 65 | 64 20 66 72 6f 6d 0d 0a |ranslate|d from..|
|00001140| 20 20 20 20 20 20 49 44 | 20 3d 20 5e 44 45 46 49 | ID| = ^DEFI|
|00001150| 4e 45 44 2d 54 59 50 45 | 0d 0a 20 20 20 69 6e 74 |NED-TYPE|.. int|
|00001160| 6f 0d 0a 20 20 20 20 20 | 20 44 45 46 49 4e 45 44 |o.. | DEFINED|
|00001170| 2d 54 59 50 45 20 2a 49 | 44 2e 0d 0a 0d 0a 20 20 |-TYPE *I|D..... |
|00001180| 20 53 74 72 69 6e 67 20 | 74 79 70 65 73 20 61 72 | String |types ar|
|00001190| 65 20 74 72 61 6e 73 6c | 61 74 65 64 20 66 72 6f |e transl|ated fro|
|000011a0| 6d 0d 0a 20 20 20 20 20 | 20 49 44 20 3d 20 73 74 |m.. | ID = st|
|000011b0| 72 69 6e 67 5b 4e 5d 0d | 0a 20 20 20 69 6e 74 6f |ring[N].|. into|
|000011c0| 0d 0a 20 20 20 20 20 20 | 74 79 70 65 64 65 66 20 |.. |typedef |
|000011d0| 63 68 61 72 20 49 44 5b | 4e 2b 31 5d 2e 0d 0a 0d |char ID[|N+1]....|
|000011e0| 0a 20 20 20 46 69 6c 65 | 20 74 79 70 65 73 20 61 |. File| types a|
|000011f0| 72 65 20 74 72 61 6e 73 | 6c 61 74 65 64 20 66 72 |re trans|lated fr|
|00001200| 6f 6d 0d 0a 20 20 20 20 | 20 20 49 44 20 3d 20 74 |om.. | ID = t|
|00001210| 65 78 74 5b 4e 5d 0d 0a | 20 20 20 20 20 20 49 44 |ext[N]..| ID|
|00001220| 20 3d 20 66 69 6c 65 0d | 0a 20 20 20 69 6e 74 6f | = file.|. into|
|00001230| 0d 0a 20 20 20 20 20 20 | 46 49 4c 45 20 2a 49 44 |.. |FILE *ID|
|00001240| 0d 0a 20 20 20 20 20 20 | 69 6e 74 20 49 44 2e 0d |.. |int ID..|
|00001250| 0a 0d 0a 20 20 20 46 6f | 72 20 73 74 61 74 65 6d |... Fo|r statem|
|00001260| 65 6e 74 73 20 61 72 65 | 20 74 72 61 6e 73 6c 61 |ents are| transla|
|00001270| 74 65 64 20 66 72 6f 6d | 0d 0a 20 20 20 20 20 20 |ted from|.. |
|00001280| 66 6f 72 20 56 41 52 20 | 3a 3d 20 46 49 52 53 54 |for VAR |:= FIRST|
|00001290| 20 74 6f 20 4c 41 53 54 | 20 64 6f 20 53 54 41 54 | to LAST| do STAT|
|000012a0| 45 4d 45 4e 54 0d 0a 20 | 20 20 20 20 20 66 6f 72 |EMENT.. | for|
|000012b0| 20 56 41 52 20 3a 3d 20 | 46 49 52 53 54 20 64 6f | VAR := |FIRST do|
|000012c0| 77 6e 74 6f 20 4c 41 53 | 54 20 64 6f 20 73 74 61 |wnto LAS|T do sta|
|000012d0| 74 65 6d 65 6e 74 0d 0a | 20 20 20 69 6e 74 6f 0d |tement..| into.|
|000012e0| 0a 20 20 20 20 20 20 66 | 6f 72 20 28 56 41 52 20 |. f|or (VAR |
|000012f0| 3d 20 46 49 52 53 54 3b | 20 56 41 52 20 3c 3d 20 |= FIRST;| VAR <= |
|00001300| 4c 41 53 54 3b 20 56 41 | 52 2b 2b 29 20 53 54 41 |LAST; VA|R++) STA|
|00001310| 54 45 4d 45 4e 54 0d 0a | 20 20 20 20 20 20 66 6f |TEMENT..| fo|
|00001320| 72 20 28 56 41 52 20 3d | 20 46 49 52 53 54 3b 20 |r (VAR =| FIRST; |
|00001330| 56 41 52 20 3e 3d 20 4c | 41 53 54 3b 20 56 41 52 |VAR >= L|AST; VAR|
|00001340| 2d 2d 29 20 53 54 41 54 | 45 4d 45 4e 54 0d 0a 0d |--) STAT|EMENT...|
|00001350| 0a 20 20 20 57 68 69 6c | 65 20 73 74 61 74 65 6d |. Whil|e statem|
|00001360| 65 6e 74 73 20 61 72 65 | 20 74 72 61 6e 73 6c 61 |ents are| transla|
|00001370| 74 65 64 20 66 72 6f 6d | 0d 0a 20 20 20 20 20 20 |ted from|.. |
|00001380| 77 68 69 6c 65 20 43 4f | 4e 44 20 64 6f 20 53 54 |while CO|ND do ST|
|00001390| 41 54 45 4d 45 4e 54 0d | 0a 20 20 20 69 6e 74 6f |ATEMENT.|. into|
|000013a0| 0d 0a 20 20 20 20 20 20 | 77 68 69 6c 65 20 28 43 |.. |while (C|
|000013b0| 4f 4e 44 29 20 73 74 61 | 74 65 6d 65 6e 74 2e 0d |OND) sta|tement..|
|000013c0| 0a 0d 0a 20 20 20 52 65 | 70 65 61 74 20 73 74 61 |... Re|peat sta|
|000013d0| 74 65 6d 65 6e 74 73 20 | 61 72 65 20 74 72 61 6e |tements |are tran|
|000013e0| 73 6c 61 74 65 64 20 66 | 72 6f 6d 0d 0a 20 20 20 |slated f|rom.. |
|000013f0| 20 20 20 72 65 70 65 61 | 74 20 53 54 41 54 45 4d | repea|t STATEM|
|00001400| 45 4e 54 53 20 75 6e 74 | 69 6c 20 43 4f 4e 44 0d |ENTS unt|il COND.|
|00001410| 0a 20 20 20 69 6e 74 6f | 0d 0a 20 20 20 20 20 20 |. into|.. |
|00001420| 64 6f 20 7b 20 53 54 41 | 54 45 4d 45 4e 54 53 20 |do { STA|TEMENTS |
|00001430| 7d 20 77 68 69 6c 65 28 | 21 43 4f 4e 44 29 2e 0d |} while(|!COND)..|
|00001440| 0a 0d 0a 20 20 20 49 66 | 20 73 74 61 74 65 6d 65 |... If| stateme|
|00001450| 6e 74 73 20 61 72 65 20 | 74 72 61 6e 73 6c 61 74 |nts are |translat|
|00001460| 65 64 20 66 72 6f 6d 0d | 0a 20 20 20 20 20 20 69 |ed from.|. i|
|00001470| 66 20 43 4f 4e 44 20 74 | 68 65 6e 20 53 54 41 54 |f COND t|hen STAT|
|00001480| 45 4d 45 4e 54 20 65 6c | 73 65 20 53 54 41 54 45 |EMENT el|se STATE|
|00001490| 4d 45 4e 54 0d 0a 20 20 | 20 69 6e 74 6f 0d 0a 20 |MENT.. | into.. |
|000014a0| 20 20 20 20 20 69 66 20 | 28 43 4f 4e 44 29 20 53 | if |(COND) S|
|000014b0| 54 41 54 45 4d 45 4e 54 | 3b 20 65 6c 73 65 20 53 |TATEMENT|; else S|
|000014c0| 54 41 54 45 4d 45 4e 54 | 2e 0d 0a 0c 0d 0a 20 20 |TATEMENT|...... |
|000014d0| 20 43 61 73 65 20 73 74 | 61 74 65 6d 65 6e 74 73 | Case st|atements|
|000014e0| 20 61 72 65 20 74 72 61 | 6e 73 6c 61 74 65 64 20 | are tra|nslated |
|000014f0| 66 72 6f 6d 0d 0a 20 20 | 20 20 20 20 63 61 73 65 |from.. | case|
|00001500| 20 56 41 4c 55 45 20 6f | 66 0d 0a 20 20 20 20 20 | VALUE o|f.. |
|00001510| 20 20 20 20 56 3a 20 20 | 20 20 53 54 41 54 45 4d | V: | STATEM|
|00001520| 45 4e 54 3b 0d 0a 20 20 | 20 20 20 20 20 20 20 56 |ENT;.. | V|
|00001530| 2c 55 3a 20 20 53 54 41 | 54 45 4d 45 4e 54 3b 0d |,U: STA|TEMENT;.|
|00001540| 0a 20 20 20 20 20 20 20 | 20 20 65 6c 73 65 20 20 |. | else |
|00001550| 53 54 41 54 45 4d 45 4e | 54 0d 0a 20 20 20 20 20 |STATEMEN|T.. |
|00001560| 20 65 6e 64 0d 0a 20 20 | 20 69 6e 74 6f 0d 0a 20 | end.. | into.. |
|00001570| 20 20 20 20 20 73 77 69 | 74 63 68 20 28 56 41 4c | swi|tch (VAL|
|00001580| 55 45 29 20 7b 0d 0a 20 | 20 20 20 20 20 20 20 20 |UE) {.. | |
|00001590| 63 61 73 65 20 56 3a 20 | 20 53 54 41 54 45 4d 45 |case V: | STATEME|
|000015a0| 4e 54 3b 20 62 72 65 61 | 6b 3b 0d 0a 20 20 20 20 |NT; brea|k;.. |
|000015b0| 20 20 20 20 20 63 61 73 | 65 20 56 3a 0d 0a 20 20 | cas|e V:.. |
|000015c0| 20 20 20 20 20 20 20 63 | 61 73 65 20 55 3a 20 20 | c|ase U: |
|000015d0| 53 54 41 54 45 4d 45 4e | 54 3b 20 62 72 65 61 6b |STATEMEN|T; break|
|000015e0| 3b 0d 0a 20 20 20 20 20 | 20 20 20 20 64 65 66 61 |;.. | defa|
|000015f0| 75 6c 74 3a 20 53 54 41 | 54 45 4d 45 4e 54 3b 0d |ult: STA|TEMENT;.|
|00001600| 0a 20 20 20 20 20 20 7d | 2e 0d 0a 20 20 20 20 20 |. }|... |
|00001610| 20 0d 0a 20 20 20 52 61 | 6e 67 65 73 20 69 6e 20 | .. Ra|nges in |
|00001620| 74 68 65 20 66 6f 72 6d | 20 56 41 4c 2e 2e 56 41 |the form| VAL..VA|
|00001630| 4c 20 61 75 74 6f 6d 61 | 74 69 63 61 6c 6c 79 20 |L automa|tically |
|00001640| 69 6e 63 6c 75 64 65 20 | 63 61 73 65 73 20 66 6f |include |cases fo|
|00001650| 72 20 0d 0a 20 20 20 69 | 6e 74 65 72 6d 65 64 69 |r .. i|ntermedi|
|00001660| 61 74 65 20 76 61 6c 75 | 65 73 2e 0d 0a 0d 0a 20 |ate valu|es..... |
|00001670| 20 20 54 68 65 20 49 4e | 20 6f 70 65 72 61 74 6f | The IN| operato|
|00001680| 72 20 69 73 20 74 72 61 | 6e 73 6c 61 74 65 64 20 |r is tra|nslated |
|00001690| 66 72 6f 6d 0d 0a 20 20 | 20 20 20 20 56 41 4c 20 |from.. | VAL |
|000016a0| 69 6e 20 5b 41 2c 42 2c | 43 5d 0d 0a 20 20 20 20 |in [A,B,|C].. |
|000016b0| 69 6e 74 6f 0d 0a 20 20 | 20 20 20 20 69 6e 73 65 |into.. | inse|
|000016c0| 74 28 56 41 4c 2c 20 73 | 65 74 6f 66 28 41 2c 42 |t(VAL, s|etof(A,B|
|000016d0| 2c 43 2c 2d 31 29 29 2e | 0d 0a 0d 0a 20 20 20 54 |,C,-1)).|.... T|
|000016e0| 68 65 20 50 61 72 61 6d | 43 6f 75 6e 74 20 61 6e |he Param|Count an|
|000016f0| 64 20 50 61 72 61 6d 53 | 74 72 20 66 75 6e 63 74 |d ParamS|tr funct|
|00001700| 69 6f 6e 73 20 61 72 65 | 20 74 72 61 6e 73 6c 61 |ions are| transla|
|00001710| 74 65 64 20 66 72 6f 6d | 0d 0a 20 20 20 20 20 20 |ted from|.. |
|00001720| 70 61 72 61 6d 63 6f 75 | 6e 74 0d 0a 20 20 20 20 |paramcou|nt.. |
|00001730| 20 20 70 61 72 61 6d 73 | 74 72 28 6e 29 0d 0a 20 | params|tr(n).. |
|00001740| 20 20 69 6e 74 6f 0d 0a | 20 20 20 20 20 20 61 72 | into..| ar|
|00001750| 67 63 0d 0a 20 20 20 20 | 20 20 61 72 67 76 5b 6e |gc.. | argv[n|
|00001760| 5d 2e 0d 0a 0d 0a 20 20 | 20 44 75 6d 6d 79 20 70 |]..... | Dummy p|
|00001770| 61 72 61 6d 65 74 65 72 | 20 6c 69 73 74 73 20 61 |arameter| lists a|
|00001780| 72 65 20 61 64 64 65 64 | 20 74 6f 20 66 75 6e 63 |re added| to func|
|00001790| 74 69 6f 6e 20 61 6e 64 | 20 70 72 6f 63 65 64 75 |tion and| procedu|
|000017a0| 72 65 20 63 61 6c 6c 73 | 2c 0d 0a 20 20 20 77 68 |re calls|,.. wh|
|000017b0| 65 72 65 20 74 68 65 79 | 20 61 72 65 20 72 65 71 |ere they| are req|
|000017c0| 75 69 72 65 64 20 69 6e | 20 43 20 62 75 74 20 6e |uired in| C but n|
|000017d0| 6f 74 20 69 6e 20 50 61 | 73 63 61 6c 2e 0d 0a 0d |ot in Pa|scal....|
|000017e0| 0a 20 20 20 54 68 65 20 | 66 6f 6c 6c 6f 77 69 6e |. The |followin|
|000017f0| 67 20 65 78 70 72 65 73 | 73 69 6f 6e 20 6f 70 65 |g expres|sion ope|
|00001800| 72 61 74 6f 72 73 20 61 | 72 65 20 74 72 61 6e 73 |rators a|re trans|
|00001810| 6c 61 74 65 64 0d 0a 20 | 20 20 20 20 20 66 72 6f |lated.. | fro|
|00001820| 6d 20 20 44 49 56 20 20 | 74 6f 20 20 2f 20 2c 20 |m DIV |to / , |
|00001830| 20 20 20 20 4d 4f 44 20 | 20 74 6f 20 20 25 20 2c | MOD | to % ,|
|00001840| 0d 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 41 4e |.. | AN|
|00001850| 44 20 20 74 6f 20 20 26 | 26 2c 20 20 20 20 20 4f |D to &|&, O|
|00001860| 52 20 20 20 74 6f 20 20 | 7c 7c 2c 0d 0a 20 20 20 |R to |||,.. |
|00001870| 20 20 20 20 20 20 20 20 | 20 58 4f 52 20 20 74 6f | | XOR to|
|00001880| 20 20 7e 20 2c 20 20 20 | 20 20 3c 3e 20 20 20 74 | ~ , | <> t|
|00001890| 6f 20 20 21 3d 2c 0d 0a | 20 20 20 20 20 20 20 20 |o !=,..| |
|000018a0| 20 20 20 20 4e 4f 54 20 | 20 74 6f 20 20 21 20 2c | NOT | to ! ,|
|000018b0| 20 20 20 20 20 53 48 52 | 20 20 74 6f 20 20 3e 3e | SHR| to >>|
|000018c0| 2c 0d 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 53 |,.. | S|
|000018d0| 48 4c 20 20 74 6f 20 20 | 3c 3c 2c 20 20 20 20 20 |HL to |<<, |
|000018e0| 3d 20 20 20 20 74 6f 20 | 20 3d 3d 2c 20 20 20 20 |= to | ==, |
|000018f0| 20 20 20 20 20 20 20 20 | 20 20 20 7b 2b 6f 74 68 | | {+oth|
|00001900| 65 72 73 7d 0d 0a 20 20 | 20 20 20 20 20 20 20 20 |ers}.. | |
|00001910| 20 20 3a 3d 20 20 20 74 | 6f 20 20 3d 20 2e 0d 0a | := t|o = ...|
|00001920| 20 20 20 42 69 74 77 69 | 73 65 20 41 4e 44 20 61 | Bitwi|se AND a|
|00001930| 6e 64 20 4f 52 20 6f 70 | 65 72 61 74 6f 72 73 20 |nd OR op|erators |
|00001940| 61 72 65 20 74 72 61 6e | 73 6c 61 74 65 64 20 69 |are tran|slated i|
|00001950| 6e 74 6f 20 26 20 61 6e | 64 20 7c 2e 0d 0a 0d 0a |nto & an|d |.....|
|00001960| 20 20 20 54 68 65 20 27 | 5e 27 20 73 79 6d 62 6f | The '|^' symbo|
|00001970| 6c 20 69 73 20 74 72 61 | 6e 73 6c 61 74 65 64 0d |l is tra|nslated.|
|00001980| 0a 20 20 20 20 20 20 66 | 72 6f 6d 20 20 56 41 52 |. f|rom VAR|
|00001990| 5e 20 20 20 20 20 20 20 | 20 20 20 74 6f 20 20 2a |^ | to *|
|000019a0| 56 41 52 2c 0d 0a 20 20 | 20 20 20 20 20 20 20 20 |VAR,.. | |
|000019b0| 20 20 56 41 52 5e 2e 4d | 45 4d 42 45 52 20 20 20 | VAR^.M|EMBER |
|000019c0| 74 6f 20 20 56 41 52 2d | 3e 4d 45 4d 42 45 52 2e |to VAR-|>MEMBER.|
|000019d0| 0d 0a 0d 0a 20 20 20 45 | 78 69 74 20 73 74 61 74 |.... E|xit stat|
|000019e0| 65 6d 65 6e 74 73 20 61 | 72 65 20 74 72 61 6e 73 |ements a|re trans|
|000019f0| 6c 61 74 65 64 0d 0a 20 | 20 20 20 20 20 66 72 6f |lated.. | fro|
|00001a00| 6d 20 20 65 78 69 74 20 | 20 20 20 74 6f 20 20 72 |m exit | to r|
|00001a10| 65 74 75 72 6e 2e 0d 0a | 0d 0a 20 20 20 54 68 65 |eturn...|.. The|
|00001a20| 20 4e 65 77 20 6f 70 65 | 72 61 74 6f 72 20 69 73 | New ope|rator is|
|00001a30| 20 74 72 61 6e 73 6c 61 | 74 65 64 20 66 72 6f 6d | transla|ted from|
|00001a40| 0d 0a 20 20 20 20 20 20 | 6e 65 77 28 56 41 52 29 |.. |new(VAR)|
|00001a50| 0d 0a 20 20 20 69 6e 74 | 6f 0d 0a 20 20 20 20 20 |.. int|o.. |
|00001a60| 20 56 41 52 20 3d 20 6d | 61 6c 6c 6f 63 28 73 69 | VAR = m|alloc(si|
|00001a70| 7a 65 6f 66 28 2a 56 41 | 52 29 29 2e 0d 0a 0d 0a |zeof(*VA|R)).....|
|00001a80| 0d 0a 20 20 20 50 72 6f | 63 65 64 75 72 65 2f 66 |.. Pro|cedure/f|
|00001a90| 75 6e 63 74 69 6f 6e 20 | 66 6f 72 6d 61 6c 20 70 |unction |formal p|
|00001aa0| 61 72 61 6d 65 74 65 72 | 20 6c 69 73 74 73 20 61 |arameter| lists a|
|00001ab0| 72 65 20 74 72 61 6e 73 | 6c 61 74 65 64 20 69 6e |re trans|lated in|
|00001ac0| 74 6f 20 74 68 65 0d 0a | 20 20 20 20 20 20 6e 65 |to the..| ne|
|00001ad0| 77 20 66 6f 72 6d 20 64 | 65 66 69 6e 65 64 20 69 |w form d|efined i|
|00001ae0| 6e 20 41 4e 53 49 20 43 | 20 28 61 6e 64 20 61 73 |n ANSI C| (and as|
|00001af0| 20 75 73 65 64 20 62 79 | 20 54 75 72 62 6f 20 43 | used by| Turbo C|
|00001b00| 29 3a 0d 0a 20 20 20 66 | 72 6f 6d 0d 0a 20 20 20 |):.. f|rom.. |
|00001b10| 20 20 20 66 75 6e 63 74 | 69 6f 6e 20 4e 41 4d 45 | funct|ion NAME|
|00001b20| 28 56 31 3a 20 54 59 50 | 45 31 3b 20 56 32 3a 20 |(V1: TYP|E1; V2: |
|00001b30| 54 59 50 45 32 29 3a 20 | 54 59 50 45 33 0d 0a 20 |TYPE2): |TYPE3.. |
|00001b40| 20 20 69 6e 74 6f 0d 0a | 20 20 20 20 20 20 54 59 | into..| TY|
|00001b50| 50 45 33 20 4e 41 4d 45 | 28 54 59 50 45 31 20 56 |PE3 NAME|(TYPE1 V|
|00001b60| 31 2c 54 59 50 45 32 20 | 56 32 29 0d 0a 0c 0d 0a |1,TYPE2 |V2).....|
|00001b70| 20 20 20 50 72 6f 63 65 | 64 75 72 65 73 20 61 72 | Proce|dures ar|
|00001b80| 65 20 74 72 61 6e 73 6c | 61 74 65 64 20 69 6e 74 |e transl|ated int|
|00001b90| 6f 20 66 75 6e 63 74 69 | 6f 6e 73 20 77 69 74 68 |o functi|ons with|
|00001ba0| 20 27 76 6f 69 64 27 20 | 72 65 74 75 72 6e 20 74 | 'void' |return t|
|00001bb0| 79 70 65 73 2e 0d 0a 0d | 0a 20 20 20 54 68 65 20 |ypes....|. The |
|00001bc0| 73 70 65 63 69 61 6c 20 | 63 68 61 72 61 63 74 65 |special |characte|
|00001bd0| 72 20 6c 69 74 65 72 61 | 6c 20 73 79 6e 74 61 78 |r litera|l syntax|
|00001be0| 2c 20 5e 43 20 6f 72 20 | 23 6e 6e 2c 20 69 73 20 |, ^C or |#nn, is |
|00001bf0| 74 72 61 6e 73 6c 61 74 | 65 64 20 69 6e 74 6f 0d |translat|ed into.|
|00001c00| 0a 20 20 20 27 5c 6f 6f | 6f 27 2c 20 77 68 65 72 |. '\oo|o', wher|
|00001c10| 65 20 6f 6f 6f 20 69 73 | 20 74 68 65 20 6f 63 74 |e ooo is| the oct|
|00001c20| 61 6c 20 6e 6f 74 61 74 | 69 6f 6e 20 66 6f 72 20 |al notat|ion for |
|00001c30| 74 68 65 20 61 73 63 69 | 69 20 63 6f 64 65 2e 0d |the asci|i code..|
|00001c40| 0a 0d 0a 20 20 20 48 65 | 78 20 63 6f 6e 73 74 61 |... He|x consta|
|00001c50| 6e 74 73 20 24 68 68 68 | 68 20 61 72 65 20 74 72 |nts $hhh|h are tr|
|00001c60| 61 6e 73 6c 61 74 65 64 | 20 69 6e 74 6f 20 30 78 |anslated| into 0x|
|00001c70| 68 68 68 68 2e 0d 0a 0d | 0a 20 20 20 57 72 69 74 |hhhh....|. Writ|
|00001c80| 65 20 61 6e 64 20 57 72 | 69 74 65 4c 6e 20 61 72 |e and Wr|iteLn ar|
|00001c90| 65 20 74 72 61 6e 73 6c | 61 74 65 64 20 66 72 6f |e transl|ated fro|
|00001ca0| 6d 3a 0d 0a 20 20 20 20 | 20 20 77 72 69 74 65 28 |m:.. | write(|
|00001cb0| 56 41 52 2c 56 41 52 3a | 6e 2c 56 41 52 3a 6e 3a |VAR,VAR:|n,VAR:n:|
|00001cc0| 6d 29 0d 0a 20 20 20 20 | 20 20 77 72 69 74 65 6c |m).. | writel|
|00001cd0| 6e 28 46 49 4c 45 2c 56 | 41 52 2c 56 41 52 2c 56 |n(FILE,V|AR,VAR,V|
|00001ce0| 41 52 29 0d 0a 20 20 20 | 69 6e 74 6f 0d 0a 20 20 |AR).. |into.. |
|00001cf0| 20 20 20 20 70 72 69 6e | 74 66 28 22 25 64 25 6e | prin|tf("%d%n|
|00001d00| 64 25 6e 2e 6d 64 22 2c | 56 41 52 2c 56 41 52 2c |d%n.md",|VAR,VAR,|
|00001d10| 56 41 52 29 0d 0a 20 20 | 20 20 20 20 66 70 72 69 |VAR).. | fpri|
|00001d20| 6e 74 66 28 46 49 4c 45 | 2c 22 25 64 25 64 25 64 |ntf(FILE|,"%d%d%d|
|00001d30| 5c 6e 22 2c 56 41 52 2c | 56 41 52 2c 56 41 52 29 |\n",VAR,|VAR,VAR)|
|00001d40| 2e 0d 0a 0d 0a 20 20 20 | 52 65 61 64 20 61 6e 64 |..... |Read and|
|00001d50| 20 52 65 61 64 4c 6e 20 | 61 72 65 20 74 72 61 6e | ReadLn |are tran|
|00001d60| 73 6c 61 74 65 64 20 66 | 72 6f 6d 3a 0d 0a 20 20 |slated f|rom:.. |
|00001d70| 20 20 20 20 72 65 61 64 | 28 56 41 52 2c 56 41 52 | read|(VAR,VAR|
|00001d80| 2c 56 41 52 29 0d 0a 20 | 20 20 20 20 20 72 65 61 |,VAR).. | rea|
|00001d90| 64 6c 6e 28 46 49 4c 45 | 2c 56 41 52 2c 56 41 52 |dln(FILE|,VAR,VAR|
|00001da0| 2c 56 41 52 29 0d 0a 20 | 20 20 69 6e 74 6f 0d 0a |,VAR).. | into..|
|00001db0| 20 20 20 20 20 20 73 63 | 61 6e 66 28 22 25 64 25 | sc|anf("%d%|
|00001dc0| 6e 64 25 64 22 2c 26 56 | 41 52 2c 26 56 41 52 2c |nd%d",&V|AR,&VAR,|
|00001dd0| 26 56 41 52 29 0d 0a 20 | 20 20 20 20 20 66 73 63 |&VAR).. | fsc|
|00001de0| 61 6e 66 28 46 49 4c 45 | 2c 22 25 64 25 64 25 64 |anf(FILE|,"%d%d%d|
|00001df0| 5c 6e 22 2c 26 56 41 52 | 2c 26 56 41 52 2c 26 56 |\n",&VAR|,&VAR,&V|
|00001e00| 41 52 29 2e 0d 0a 0d 0a | 20 20 20 53 74 72 69 6e |AR).....| Strin|
|00001e10| 67 20 61 73 73 69 67 6e | 6d 65 6e 74 73 20 61 72 |g assign|ments ar|
|00001e20| 65 20 74 72 61 6e 73 6c | 61 74 65 64 20 66 72 6f |e transl|ated fro|
|00001e30| 6d 3a 0d 0a 20 20 20 20 | 20 20 56 41 52 20 3a 3d |m:.. | VAR :=|
|00001e40| 20 22 73 74 72 69 6e 67 | 22 0d 0a 20 20 20 20 20 | "string|".. |
|00001e50| 20 56 41 52 20 3a 3d 20 | 22 73 74 72 69 6e 67 31 | VAR := |"string1|
|00001e60| 28 22 20 2b 20 56 41 52 | 31 20 2b 20 22 29 73 74 |(" + VAR|1 + ")st|
|00001e70| 72 69 6e 67 32 22 0d 0a | 20 20 20 69 6e 74 6f 0d |ring2"..| into.|
|00001e80| 0a 20 20 20 20 20 20 73 | 74 72 63 70 79 28 56 41 |. s|trcpy(VA|
|00001e90| 52 2c 20 22 73 74 72 69 | 6e 67 22 29 0d 0a 20 20 |R, "stri|ng").. |
|00001ea0| 20 20 20 20 73 62 6c 64 | 28 56 41 52 2c 22 73 74 | sbld|(VAR,"st|
|00001eb0| 72 69 6e 67 31 28 25 73 | 29 73 74 72 69 6e 67 32 |ring1(%s|)string2|
|00001ec0| 22 2c 56 41 52 31 29 2e | 20 20 20 20 20 20 7b 2b |",VAR1).| {+|
|00001ed0| 6f 74 68 65 72 20 63 6f | 6d 70 6f 75 6e 64 20 66 |other co|mpound f|
|00001ee0| 6f 72 6d 73 7d 0d 0a 0d | 0a 20 20 20 53 74 72 69 |orms}...|. Stri|
|00001ef0| 6e 67 20 63 6f 6d 70 61 | 72 69 73 6f 6e 73 20 61 |ng compa|risons a|
|00001f00| 72 65 20 74 72 61 6e 73 | 6c 61 74 65 64 20 66 72 |re trans|lated fr|
|00001f10| 6f 6d 3a 0d 0a 20 20 20 | 20 20 20 56 41 52 20 3d |om:.. | VAR =|
|00001f20| 3d 20 22 73 74 72 69 6e | 67 22 0d 0a 20 20 20 20 |= "strin|g".. |
|00001f30| 20 20 56 41 52 20 3c 20 | 22 73 74 72 69 6e 67 22 | VAR < |"string"|
|00001f40| 0d 0a 20 20 20 20 20 20 | 22 73 74 72 69 6e 67 22 |.. |"string"|
|00001f50| 20 3e 3d 20 56 41 52 0d | 0a 20 20 20 69 6e 74 6f | >= VAR.|. into|
|00001f60| 0d 0a 20 20 20 20 20 20 | 28 73 74 72 63 6d 70 28 |.. |(strcmp(|
|00001f70| 56 41 52 2c 22 73 74 72 | 69 6e 67 22 29 20 3d 3d |VAR,"str|ing") ==|
|00001f80| 20 30 29 0d 0a 20 20 20 | 20 20 20 28 73 74 72 63 | 0).. | (strc|
|00001f90| 6d 70 28 56 41 52 2c 22 | 73 74 72 69 6e 67 22 29 |mp(VAR,"|string")|
|00001fa0| 20 3c 20 30 29 0d 0a 20 | 20 20 20 20 20 28 73 74 | < 0).. | (st|
|00001fb0| 72 63 6d 70 28 22 73 74 | 72 69 6e 67 22 2c 56 41 |rcmp("st|ring",VA|
|00001fc0| 52 29 20 3e 3d 20 30 29 | 2e 0d 0a 0d 0a 20 20 20 |R) >= 0)|..... |
|00001fd0| 46 75 6e 63 74 69 6f 6e | 20 76 61 6c 75 65 20 61 |Function| value a|
|00001fe0| 73 73 69 67 6e 6d 65 6e | 74 73 20 61 72 65 20 74 |ssignmen|ts are t|
|00001ff0| 72 61 6e 73 6c 61 74 65 | 64 20 66 72 6f 6d 3a 0d |ranslate|d from:.|
|00002000| 0a 20 20 20 20 20 20 46 | 55 4e 5f 4e 41 4d 45 20 |. F|UN_NAME |
|00002010| 3a 3d 20 65 78 70 72 0d | 0a 20 20 20 69 6e 74 6f |:= expr.|. into|
|00002020| 0d 0a 20 20 20 20 20 20 | 72 65 74 75 72 6e 20 65 |.. |return e|
|00002030| 78 70 72 2e 0d 0a 0d 0a | 20 20 20 4e 75 6d 65 72 |xpr.....| Numer|
|00002040| 69 63 20 73 74 61 74 65 | 6d 65 6e 74 20 6c 61 62 |ic state|ment lab|
|00002050| 65 6c 73 20 61 72 65 20 | 74 72 61 6e 73 6c 61 74 |els are |translat|
|00002060| 65 64 20 74 6f 20 6c 61 | 62 65 6c 5f 6e 6e 2e 20 |ed to la|bel_nn. |
|00002070| 20 0d 0a 20 20 20 4c 61 | 62 65 6c 20 69 64 65 6e | .. La|bel iden|
|00002080| 74 69 66 69 65 72 73 20 | 61 72 65 20 6e 6f 74 20 |tifiers |are not |
|00002090| 63 68 61 6e 67 65 64 2e | 20 20 0d 0a 20 20 20 4c |changed.| .. L|
|000020a0| 6f 63 61 6c 20 47 4f 54 | 4f 20 73 74 61 74 65 6d |ocal GOT|O statem|
|000020b0| 65 6e 74 73 20 61 72 65 | 20 68 61 6e 64 6c 65 64 |ents are| handled|
|000020c0| 20 70 72 6f 70 65 72 6c | 79 2e 20 0d 0a 0d 0a 20 | properl|y. .... |
|000020d0| 20 20 4e 65 73 74 65 64 | 20 70 72 6f 63 65 64 75 | Nested| procedu|
|000020e0| 72 65 73 20 61 72 65 20 | 22 66 6c 61 74 74 65 6e |res are |"flatten|
|000020f0| 65 64 22 20 6f 75 74 2c | 20 62 75 74 20 6c 6f 63 |ed" out,| but loc|
|00002100| 61 6c 20 76 61 72 69 61 | 62 6c 65 20 73 68 61 72 |al varia|ble shar|
|00002110| 69 6e 67 20 61 6e 64 20 | 0d 0a 20 20 20 6c 6f 63 |ing and |.. loc|
|00002120| 61 6c 20 73 63 6f 70 69 | 6e 67 20 61 72 65 20 6e |al scopi|ng are n|
|00002130| 6f 74 20 74 72 61 6e 73 | 6c 61 74 65 64 2e 20 0d |ot trans|lated. .|
|00002140| 0a 0d 0a 20 20 20 44 69 | 72 65 63 74 20 49 2f 4f |... Di|rect I/O|
|00002150| 20 70 6f 72 74 20 61 6e | 64 20 6d 65 6d 6f 72 79 | port an|d memory|
|00002160| 20 72 65 66 65 72 65 6e | 63 65 73 20 61 72 65 20 | referen|ces are |
|00002170| 74 72 61 6e 73 6c 61 74 | 65 64 3a 0d 0a 20 20 20 |translat|ed:.. |
|00002180| 20 20 20 70 6f 72 74 77 | 5b 65 78 70 72 5d 20 3a | portw|[expr] :|
|00002190| 3d 20 65 78 70 72 20 2b | 20 70 6f 72 74 5b 6e 5d |= expr +| port[n]|
|000021a0| 0d 0a 20 20 20 20 20 20 | 6d 65 6d 5b 73 65 67 3a |.. |mem[seg:|
|000021b0| 6f 66 73 5d 20 3a 3d 20 | 6d 65 6d 77 5b 73 65 67 |ofs] := |memw[seg|
|000021c0| 3a 6f 66 73 5d 20 2b 20 | 65 78 70 72 0d 0a 20 20 |:ofs] + |expr.. |
|000021d0| 20 69 6e 74 6f 0d 0a 20 | 20 20 20 20 20 6f 75 74 | into.. | out|
|000021e0| 70 6f 72 74 28 65 78 70 | 72 2c 20 65 78 70 72 2b |port(exp|r, expr+|
|000021f0| 69 6e 70 6f 72 74 62 28 | 6e 29 29 0d 0a 20 20 20 |inportb(|n)).. |
|00002200| 20 20 20 70 6f 6b 65 62 | 28 73 65 67 2c 6f 66 73 | pokeb|(seg,ofs|
|00002210| 2c 20 70 65 65 6b 28 73 | 65 67 2c 6f 66 73 29 2b |, peek(s|eg,ofs)+|
|00002220| 65 78 70 72 29 0d 0a 0d | 0a 20 20 20 56 41 52 20 |expr)...|. VAR |
|00002230| 70 61 72 61 6d 65 74 65 | 72 73 20 61 72 65 20 74 |paramete|rs are t|
|00002240| 72 61 6e 73 6c 61 74 65 | 64 20 69 6e 74 6f 20 70 |ranslate|d into p|
|00002250| 6f 69 6e 74 65 72 20 76 | 61 72 69 61 62 6c 65 73 |ointer v|ariables|
|00002260| 3b 20 0d 0a 20 20 20 72 | 65 66 65 72 65 6e 63 65 |; .. r|eference|
|00002270| 73 20 74 6f 20 66 6f 72 | 6d 61 6c 20 70 61 72 61 |s to for|mal para|
|00002280| 6d 65 74 65 72 73 20 61 | 72 65 20 69 6d 70 6c 69 |meters a|re impli|
|00002290| 63 69 74 6c 79 20 64 65 | 72 65 66 65 72 65 6e 63 |citly de|referenc|
|000022a0| 65 64 20 28 69 2e 65 2e | 20 2a 20 61 64 64 65 64 |ed (i.e.| * added|
|000022b0| 29 3b 0d 0a 20 20 20 72 | 65 66 65 72 65 6e 63 65 |);.. r|eference|
|000022c0| 73 20 74 6f 20 61 63 74 | 75 61 6c 20 70 61 72 61 |s to act|ual para|
|000022d0| 6d 65 74 65 72 73 20 61 | 72 65 20 69 6d 70 6c 69 |meters a|re impli|
|000022e0| 63 69 74 6c 79 20 72 65 | 66 65 72 65 6e 63 65 64 |citly re|ferenced|
|000022f0| 20 28 69 2e 65 2e 20 26 | 20 61 64 64 65 64 29 2e | (i.e. &| added).|
|00002300| 0d 0a 0d 0a 20 20 20 46 | 6f 72 77 61 72 64 20 70 |.... F|orward p|
|00002310| 6f 69 6e 74 65 72 20 74 | 79 70 65 20 64 65 63 6c |ointer t|ype decl|
|00002320| 61 72 61 74 69 6f 6e 73 | 20 61 72 65 20 74 72 61 |arations| are tra|
|00002330| 6e 73 6c 61 74 65 64 2c | 20 62 75 74 20 77 69 6c |nslated,| but wil|
|00002340| 6c 20 6e 6f 74 20 63 6f | 6d 70 69 6c 65 20 0d 0a |l not co|mpile ..|
|00002350| 20 20 20 69 6e 20 43 2e | 20 20 54 68 65 79 20 6d | in C.| They m|
|00002360| 75 73 74 20 62 65 20 6d | 61 6e 75 61 6c 6c 79 20 |ust be m|anually |
|00002370| 72 65 63 6f 64 65 64 2e | 20 0d 0a 0d 0a 20 20 20 |recoded.| .... |
|00002380| 56 61 72 69 61 6e 74 20 | 72 65 63 6f 72 64 20 74 |Variant |record t|
|00002390| 79 70 65 20 64 65 63 6c | 61 72 61 74 69 6f 6e 73 |ype decl|arations|
|000023a0| 20 61 72 65 20 74 72 61 | 6e 73 6c 61 74 65 64 20 | are tra|nslated |
|000023b0| 69 6e 74 6f 20 75 6e 69 | 6f 6e 73 2e 0d 0a 0d 0a |into uni|ons.....|
|000023c0| 20 20 20 41 62 73 6f 6c | 75 74 65 20 76 61 72 69 | Absol|ute vari|
|000023d0| 61 62 6c 65 73 20 61 72 | 65 20 74 72 61 6e 73 6c |ables ar|e transl|
|000023e0| 61 74 65 64 20 69 6e 74 | 6f 20 69 6e 69 74 69 61 |ated int|o initia|
|000023f0| 6c 69 7a 65 64 20 70 6f | 69 6e 74 65 72 20 76 61 |lized po|inter va|
|00002400| 72 69 61 62 6c 65 73 2e | 0d 0a 20 20 20 0d 0a 0d |riables.|.. ...|
|00002410| 0a 0c 0d 0a 53 75 70 70 | 6f 72 74 20 50 61 73 63 |....Supp|ort Pasc|
|00002420| 61 6c 2f 4d 54 2b 3a 0d | 0a 2d 2d 2d 2d 2d 2d 2d |al/MT+:.|.-------|
|00002430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0a 0d 0a |--------|----....|
|00002440| 20 20 20 56 61 72 20 64 | 65 63 6c 61 72 61 74 69 | Var d|eclarati|
|00002450| 6f 6e 73 20 61 72 65 20 | 74 72 61 6e 73 6c 61 74 |ons are |translat|
|00002460| 65 64 20 66 72 6f 6d 0d | 0a 20 20 20 20 20 20 49 |ed from.|. I|
|00002470| 44 20 65 78 74 65 72 6e | 61 6c 20 54 59 50 45 0d |D extern|al TYPE.|
|00002480| 0a 20 20 20 69 6e 74 6f | 0d 0a 20 20 20 20 20 20 |. into|.. |
|00002490| 65 78 74 65 72 6e 20 54 | 59 50 45 20 49 44 2e 0d |extern T|YPE ID..|
|000024a0| 0a 0d 0a 20 20 20 54 68 | 65 20 66 6f 6c 6c 6f 77 |... Th|e follow|
|000024b0| 69 6e 67 20 65 78 70 72 | 65 73 73 69 6f 6e 20 6f |ing expr|ession o|
|000024c0| 70 65 72 61 74 6f 72 73 | 20 61 72 65 20 74 72 61 |perators| are tra|
|000024d0| 6e 73 6c 61 74 65 64 0d | 0a 20 20 20 20 20 20 66 |nslated.|. f|
|000024e0| 72 6f 6d 20 20 20 21 20 | 20 20 74 6f 20 20 7c 20 |rom ! | to | |
|000024f0| 2c 20 20 20 20 7c 20 20 | 20 20 74 6f 20 20 20 7c |, | | to ||
|00002500| 2c 0d 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |,.. | |
|00002510| 26 20 20 20 74 6f 20 20 | 26 20 2c 20 20 20 20 7e |& to |& , ~|
|00002520| 20 20 20 20 74 6f 20 20 | 20 21 2c 0d 0a 20 20 20 | to | !,.. |
|00002530| 20 20 20 20 20 20 20 20 | 20 20 3f 20 20 20 74 6f | | ? to|
|00002540| 20 20 21 20 2c 20 20 20 | 20 5c 20 20 20 20 74 6f | ! , | \ to|
|00002550| 20 20 20 21 2e 0d 0a 0d | 0a 20 20 20 45 78 74 65 | !....|. Exte|
|00002560| 72 6e 61 6c 20 66 75 6e | 63 74 69 6f 6e 20 64 65 |rnal fun|ction de|
|00002570| 63 6c 61 72 61 74 69 6f | 6e 73 20 61 72 65 20 74 |claratio|ns are t|
|00002580| 72 61 6e 73 6c 61 74 65 | 64 0d 0a 20 20 20 66 72 |ranslate|d.. fr|
|00002590| 6f 6d 0d 0a 20 20 20 20 | 20 20 65 78 74 65 72 6e |om.. | extern|
|000025a0| 61 6c 20 66 75 6e 63 74 | 69 6f 6e 20 4e 41 4d 45 |al funct|ion NAME|
|000025b0| 28 56 31 3a 20 54 59 50 | 45 31 3b 20 56 32 3a 20 |(V1: TYP|E1; V2: |
|000025c0| 54 59 50 45 32 29 3a 20 | 54 59 50 45 33 0d 0a 20 |TYPE2): |TYPE3.. |
|000025d0| 20 20 20 20 20 65 78 74 | 65 72 6e 61 6c 20 5b 6e | ext|ernal [n|
|000025e0| 5d 20 66 75 6e 63 74 69 | 6f 6e 20 4e 41 4d 45 28 |] functi|on NAME(|
|000025f0| 56 31 3a 20 54 59 50 45 | 31 3b 20 56 32 3a 20 54 |V1: TYPE|1; V2: T|
|00002600| 59 50 45 32 29 3a 20 54 | 59 50 45 33 0d 0a 20 20 |YPE2): T|YPE3.. |
|00002610| 20 69 6e 74 6f 0d 0a 20 | 20 20 20 20 20 65 78 74 | into.. | ext|
|00002620| 65 72 6e 20 54 59 50 45 | 33 20 4e 41 4d 45 28 29 |ern TYPE|3 NAME()|
|00002630| 0d 0a 0d 0a 20 20 20 45 | 78 74 65 72 6e 61 6c 20 |.... E|xternal |
|00002640| 70 72 6f 63 65 64 75 72 | 65 20 64 65 63 6c 61 72 |procedur|e declar|
|00002650| 61 74 69 6f 6e 73 20 61 | 72 65 20 74 72 61 6e 73 |ations a|re trans|
|00002660| 6c 61 74 65 64 0d 0a 20 | 20 20 66 72 6f 6d 0d 0a |lated.. | from..|
|00002670| 20 20 20 20 20 20 65 78 | 74 65 72 6e 61 6c 20 70 | ex|ternal p|
|00002680| 72 6f 63 65 64 75 72 65 | 20 4e 41 4d 45 28 56 31 |rocedure| NAME(V1|
|00002690| 3a 20 54 59 50 45 31 3b | 20 56 32 3a 20 54 59 50 |: TYPE1;| V2: TYP|
|000026a0| 45 32 29 0d 0a 20 20 20 | 20 20 20 65 78 74 65 72 |E2).. | exter|
|000026b0| 6e 61 6c 20 5b 6e 5d 20 | 70 72 6f 63 65 64 75 72 |nal [n] |procedur|
|000026c0| 65 20 4e 41 4d 45 28 56 | 31 3a 20 54 59 50 45 31 |e NAME(V|1: TYPE1|
|000026d0| 3b 20 56 32 3a 20 54 59 | 50 45 32 29 0d 0a 20 20 |; V2: TY|PE2).. |
|000026e0| 20 69 6e 74 6f 0d 0a 20 | 20 20 20 20 20 65 78 74 | into.. | ext|
|000026f0| 65 72 6e 20 76 6f 69 64 | 20 4e 41 4d 45 28 29 0d |ern void| NAME().|
|00002700| 0a 0d 0a 20 20 20 57 72 | 69 74 65 20 61 6e 64 20 |... Wr|ite and |
|00002710| 57 72 69 74 65 4c 6e 20 | 61 72 65 20 74 72 61 6e |WriteLn |are tran|
|00002720| 73 6c 61 74 65 64 20 66 | 72 6f 6d 3a 0d 0a 20 20 |slated f|rom:.. |
|00002730| 20 20 20 20 77 72 69 74 | 65 28 5b 41 44 44 52 28 | writ|e([ADDR(|
|00002740| 46 55 4e 29 5d 2c 56 41 | 52 3a 6e 2c 56 41 52 3a |FUN)],VA|R:n,VAR:|
|00002750| 6e 3a 6d 29 0d 0a 20 20 | 20 20 20 20 77 72 69 74 |n:m).. | writ|
|00002760| 65 28 5b 5d 2c 56 41 52 | 3a 6e 2c 56 41 52 3a 6e |e([],VAR|:n,VAR:n|
|00002770| 3a 6d 29 0d 0a 20 20 20 | 69 6e 74 6f 0d 0a 20 20 |:m).. |into.. |
|00002780| 20 20 20 20 69 70 72 69 | 6e 74 66 28 46 55 4e 2c | ipri|ntf(FUN,|
|00002790| 22 25 6e 64 25 6e 2e 6d | 64 22 2c 56 41 52 2c 56 |"%nd%n.m|d",VAR,V|
|000027a0| 41 52 29 0d 0a 20 20 20 | 20 20 20 70 72 69 6e 74 |AR).. | print|
|000027b0| 66 28 22 25 6e 64 25 6e | 2e 6d 64 22 2c 56 41 52 |f("%nd%n|.md",VAR|
|000027c0| 2c 56 41 52 29 0d 0a 0d | 0a 20 20 20 52 65 61 64 |,VAR)...|. Read|
|000027d0| 20 61 6e 64 20 52 65 61 | 64 4c 6e 20 61 72 65 20 | and Rea|dLn are |
|000027e0| 74 72 61 6e 73 6c 61 74 | 65 64 20 66 72 6f 6d 3a |translat|ed from:|
|000027f0| 0d 0a 20 20 20 20 20 20 | 72 65 61 64 28 5b 41 44 |.. |read([AD|
|00002800| 44 52 28 46 55 4e 29 5d | 2c 56 41 52 2c 56 41 52 |DR(FUN)]|,VAR,VAR|
|00002810| 29 0d 0a 20 20 20 20 20 | 20 72 65 61 64 28 5b 5d |).. | read([]|
|00002820| 2c 56 41 52 2c 56 41 52 | 29 0d 0a 20 20 20 69 6e |,VAR,VAR|).. in|
|00002830| 74 6f 0d 0a 20 20 20 20 | 20 20 69 73 63 61 6e 66 |to.. | iscanf|
|00002840| 28 46 55 4e 2c 22 25 64 | 25 6e 64 25 64 22 2c 26 |(FUN,"%d|%nd%d",&|
|00002850| 56 41 52 2c 26 56 41 52 | 2c 26 56 41 52 29 0d 0a |VAR,&VAR|,&VAR)..|
|00002860| 20 20 20 20 20 20 73 63 | 61 6e 66 28 22 25 64 25 | sc|anf("%d%|
|00002870| 6e 64 25 64 22 2c 26 56 | 41 52 2c 26 56 41 52 2c |nd%d",&V|AR,&VAR,|
|00002880| 26 56 41 52 29 0d 0a 0d | 0a 20 20 20 4c 6f 6e 67 |&VAR)...|. Long|
|00002890| 20 69 6e 74 65 67 65 72 | 20 63 6f 6e 73 74 61 6e | integer| constan|
|000028a0| 74 73 20 23 6e 6e 6e 20 | 61 72 65 20 74 72 61 6e |ts #nnn |are tran|
|000028b0| 73 6c 61 74 65 64 20 69 | 6e 74 6f 20 6e 6e 6e 4c |slated i|nto nnnL|
|000028c0| 2e 0d 0a 0d 0a 0d 0a 0c | 0d 0a 53 6f 6d 65 20 6c |........|..Some l|
|000028d0| 61 6e 67 75 61 67 65 20 | 66 65 61 74 75 72 65 73 |anguage |features|
|000028e0| 20 74 68 61 74 20 61 72 | 65 20 6e 6f 74 20 79 65 | that ar|e not ye|
|000028f0| 74 20 74 72 61 6e 73 6c | 61 74 65 64 3a 0d 0a 2d |t transl|ated:..-|
|00002900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002930| 2d 2d 0d 0a 0d 0a 20 20 | 20 46 69 6c 65 20 61 63 |--.... | File ac|
|00002940| 63 65 73 73 20 70 72 6f | 63 65 64 75 72 65 73 20 |cess pro|cedures |
|00002950| 61 72 65 20 6f 6e 6c 79 | 20 70 61 72 74 69 61 6c |are only| partial|
|00002960| 6c 79 20 73 75 70 70 6f | 72 74 65 64 20 28 61 73 |ly suppo|rted (as|
|00002970| 73 69 67 6e 2c 20 63 6c | 6f 73 65 2c 20 0d 0a 20 |sign, cl|ose, .. |
|00002980| 20 20 65 74 63 2e 29 2e | 20 0d 0a 0d 0a 20 20 20 | etc.).| .... |
|00002990| 56 61 72 69 61 6e 74 20 | 72 65 63 6f 72 64 20 74 |Variant |record t|
|000029a0| 79 70 65 20 64 65 63 6c | 27 73 20 61 72 65 20 74 |ype decl|'s are t|
|000029b0| 72 61 6e 73 6c 61 74 65 | 64 20 69 6e 74 6f 20 75 |ranslate|d into u|
|000029c0| 6e 69 6f 6e 73 2c 20 62 | 75 74 20 65 78 70 72 65 |nions, b|ut expre|
|000029d0| 73 73 69 6f 6e 73 0d 0a | 20 20 20 75 73 69 6e 67 |ssions..| using|
|000029e0| 20 74 68 65 20 76 61 72 | 69 61 6e 74 20 70 61 72 | the var|iant par|
|000029f0| 74 20 61 72 65 20 6e 6f | 74 20 74 72 61 6e 73 6c |t are no|t transl|
|00002a00| 61 74 65 64 2e 0d 0a 0d | 0a 20 20 20 43 20 6f 70 |ated....|. C op|
|00002a10| 65 72 61 74 6f 72 20 70 | 72 65 63 65 64 65 6e 63 |erator p|recedenc|
|00002a20| 65 20 64 69 66 66 65 72 | 73 20 66 72 6f 6d 20 74 |e differ|s from t|
|00002a30| 68 61 74 20 6f 66 20 50 | 61 73 63 61 6c 2c 20 61 |hat of P|ascal, a|
|00002a40| 6e 64 20 74 68 65 20 64 | 69 66 66 65 72 65 6e 63 |nd the d|ifferenc|
|00002a50| 65 73 20 0d 0a 20 20 20 | 61 72 65 20 6e 6f 74 20 |es .. |are not |
|00002a60| 74 72 61 6e 73 6c 61 74 | 65 64 2e 20 0d 0a 0d 0a |translat|ed. ....|
|00002a70| 20 20 20 54 68 65 20 57 | 49 54 48 20 73 74 61 74 | The W|ITH stat|
|00002a80| 65 6d 65 6e 74 20 69 73 | 20 6e 6f 74 20 74 72 61 |ement is| not tra|
|00002a90| 6e 73 6c 61 74 65 64 2e | 0d 0a 0d 0a 20 20 20 4c |nslated.|.... L|
|00002aa0| 6f 63 61 6c 20 76 61 72 | 69 61 62 6c 65 20 73 68 |ocal var|iable sh|
|00002ab0| 61 72 69 6e 67 20 61 6d | 6f 6e 67 20 6e 65 73 74 |aring am|ong nest|
|00002ac0| 65 64 20 70 72 6f 63 65 | 64 75 72 65 73 20 69 73 |ed proce|dures is|
|00002ad0| 20 6e 6f 74 20 74 72 61 | 6e 73 6c 61 74 65 64 2e | not tra|nslated.|
|00002ae0| 20 0d 0a 0d 0a 0d 0a 0d | 0a 52 65 76 69 73 69 6f | .......|.Revisio|
|00002af0| 6e 20 68 69 73 74 6f 72 | 79 0d 0a 2d 2d 2d 2d 2d |n histor|y..-----|
|00002b00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0a 0d 0a 20 |--------|---.... |
|00002b10| 20 53 65 65 20 48 49 53 | 54 4f 52 59 2e 44 4f 43 | See HIS|TORY.DOC|
|00002b20| 20 66 6f 72 20 74 68 65 | 20 63 6f 6d 70 6c 65 74 | for the| complet|
|00002b30| 65 20 72 65 76 69 73 69 | 6f 6e 20 68 69 73 74 6f |e revisi|on histo|
|00002b40| 72 79 2e 0d 0a 20 20 0d | 0a 20 20 49 20 63 6f 6e |ry... .|. I con|
|00002b50| 74 69 6e 75 65 20 74 6f | 20 75 70 64 61 74 65 20 |tinue to| update |
|00002b60| 61 6e 64 20 69 6d 70 72 | 6f 76 65 20 54 50 54 43 |and impr|ove TPTC|
|00002b70| 2e 20 20 49 66 20 79 6f | 75 20 68 61 76 65 20 61 |. If yo|u have a|
|00002b80| 20 70 72 6f 67 72 61 6d | 20 74 68 61 74 0d 0a 20 | program| that.. |
|00002b90| 20 54 50 54 43 20 77 69 | 6c 6c 20 6e 6f 74 20 74 | TPTC wi|ll not t|
|00002ba0| 72 61 6e 73 6c 61 74 65 | 2c 20 70 6c 65 61 73 65 |ranslate|, please|
|00002bb0| 20 73 65 6e 64 20 6d 65 | 20 61 20 63 6f 70 79 20 | send me| a copy |
|00002bc0| 6f 66 20 69 74 2e 20 20 | 54 68 69 73 20 77 69 6c |of it. |This wil|
|00002bd0| 6c 20 68 65 6c 70 0d 0a | 20 20 6d 65 20 69 6e 20 |l help..| me in |
|00002be0| 66 75 74 75 72 65 20 76 | 65 72 73 69 6f 6e 73 2e |future v|ersions.|
|00002bf0| 20 20 49 20 77 69 6c 6c | 20 6e 6f 74 20 72 65 64 | I will| not red|
|00002c00| 69 73 74 72 69 62 75 74 | 65 20 74 68 65 20 66 69 |istribut|e the fi|
|00002c10| 6c 65 20 77 69 74 68 6f | 75 74 20 79 6f 75 72 0d |le witho|ut your.|
|00002c20| 0a 20 20 70 65 72 6d 69 | 73 73 69 6f 6e 2e 0d 0a |. permi|ssion...|
|00002c30| 0d 0a 20 20 53 65 6e 64 | 20 73 61 6d 70 6c 65 20 |.. Send| sample |
|00002c40| 73 6f 75 72 63 65 73 20 | 74 6f 3a 0d 0a 20 20 20 |sources |to:.. |
|00002c50| 20 20 20 53 61 6d 75 65 | 6c 2e 20 48 2e 20 53 6d | Samue|l. H. Sm|
|00002c60| 69 74 68 0d 0a 20 20 20 | 20 20 20 28 36 30 32 29 |ith.. | (602)|
|00002c70| 20 32 37 39 2d 32 36 37 | 33 20 28 64 61 74 61 29 | 279-267|3 (data)|
|00002c80| 0d 0a 20 20 20 20 20 20 | 35 31 31 39 20 4e 2e 20 |.. |5119 N. |
|00002c90| 31 31 20 61 76 65 20 33 | 33 32 0d 0a 20 20 20 20 |11 ave 3|32.. |
|00002ca0| 20 20 50 68 6f 65 6e 69 | 78 2c 20 41 7a 20 38 35 | Phoeni|x, Az 85|
|00002cb0| 30 31 33 0d 0a 0c 0d 0a | |013.....| |
+--------+-------------------------+-------------------------+--------+--------+
